home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / pp / pp-6.0 / Lib / format / rfc2trace.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-12-18  |  907 b   |  57 lines

  1. /* rfc2trace.c - Converts a RFC string into a Trace struct */
  2.  
  3. # ifndef lint
  4. static char Rcsid[] = "@(#)$Header: /xtel/pp/pp-beta/Lib/format/RCS/rfc2trace.c,v 6.0 1991/12/18 20:22:06 jpo Rel $";
  5. # endif
  6.  
  7. /*
  8.  * $Header: /xtel/pp/pp-beta/Lib/format/RCS/rfc2trace.c,v 6.0 1991/12/18 20:22:06 jpo Rel $
  9.  *
  10.  * $Log: rfc2trace.c,v $
  11.  * Revision 6.0  1991/12/18  20:22:06  jpo
  12.  * Release 6.0
  13.  *
  14.  */
  15.  
  16.  
  17.  
  18. #include "util.h"
  19. #include "mta.h"
  20.  
  21.  
  22.  
  23.  
  24. /* ---------------------  Begin  Routines  -------------------------------- */
  25.  
  26.  
  27.  
  28.  
  29. int rfc2trace (tp, str)
  30. Trace   *tp;
  31. char    *str;
  32. {
  33.     char    *cp = str,
  34.         *bp = str;
  35.  
  36.  
  37.     PP_DBG (("Lib/rfc2trace (%s)", str));
  38.  
  39.     cp = index (str, ';');
  40.  
  41.     if (cp == NULLCP)
  42.         return NOTOK;
  43.     else
  44.         *cp++ = '\0';
  45.  
  46.     if (*cp == ' ')
  47.         cp++;
  48.  
  49.     if (rfc2globalid (&tp->trace_DomId, bp) == NOTOK)
  50.         return NOTOK;
  51.  
  52.     if (rfc2domsinfo (&tp->trace_DomSinfo, cp) == NOTOK)
  53.         return NOTOK;
  54.  
  55.     return OK;
  56. }
  57.